inherited frmCad_GrupoEmpresarial: TfrmCad_GrupoEmpresarial
  Left = 189
  Top = 224
  Caption = 'Grupo Empres'#225'rial'
  ClientHeight = 156
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Height = 40
    object Label1: TLabel
      Left = 8
      Top = 11
      Width = 39
      Height = 14
      Caption = 'C'#243'digo'
    end
    object btnC_GrupoEmpresarial: TSpeedButton
      Left = 96
      Top = 10
      Width = 23
      Height = 22
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = btnC_GrupoEmpresarialClick
    end
    object edtGrupo_Codigo: TEdit
      Left = 56
      Top = 10
      Width = 35
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      MaxLength = 4
      TabOrder = 0
      OnEnter = edtGrupo_CodigoEnter
      OnExit = edtGrupo_CodigoExit
      OnKeyDown = edtGrupo_CodigoKeyDown
    end
  end
  inherited Panel2: TPanel
    Top = 40
    Height = 49
    object Label2: TLabel
      Left = 13
      Top = 16
      Width = 32
      Height = 14
      Caption = 'Nome'
    end
    object edtGrupo_Nome: TEdit
      Left = 56
      Top = 14
      Width = 365
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      CharCase = ecUpperCase
      MaxLength = 40
      TabOrder = 0
    end
    object ckList: TCheckBox
      Left = 426
      Top = 16
      Width = 165
      Height = 17
      Caption = 'Listar apenas grupo selec.'
      TabOrder = 1
    end
  end
  inherited Panel4: TPanel
    Top = 89
    inherited btnGravar: TFlatButton
      OnClick = btnGravarClick
    end
    inherited BtnEliminar: TFlatButton
      OnClick = BtnEliminarClick
    end
    inherited btnlistagem: TFlatButton
      OnClick = btnlistagemClick
    end
  end
  inherited BS: TStatusBar
    Top = 137
  end
  inherited RDP: TRDprint
    OnNewPage = RDPNewPage
  end
  object MD: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 340
    Top = 6
    object MDbkp_numero: TStringField
      FieldName = 'bkp_numero'
    end
    object MDNumero: TStringField
      FieldName = 'Numero'
      Size = 40
    end
    object MDEntidade: TStringField
      FieldName = 'Entidade'
    end
    object MDData: TDateField
      FieldName = 'Data'
    end
    object MDValor: TFloatField
      FieldName = 'Valor'
    end
    object MDPM: TStringField
      FieldName = 'PM'
    end
  end
  object ITEM: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 372
    Top = 6
    object ITEMBkp: TStringField
      FieldName = 'Bkp'
    end
    object ITEMPro_Codigo: TStringField
      FieldName = 'Pro_Codigo'
    end
    object ITEMQtde: TFloatField
      FieldName = 'Qtde'
    end
    object ITEMValor: TFloatField
      FieldName = 'Valor'
    end
  end
end
